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IDENTIFICATION 

PROOUCT COOE: AC E884C-MC 

PROOUCT NAME j CXBEACO M7855 BUS TESTER MODULE 

PRODUCT DATE: APRIL 1983 

MAINTAINOR; DEC/X11 SUPPORT GROUP 

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE 
UITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT 
BY DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT 
CORPORATION ASSUMES NO RESPONS T BILITY FGR ANY ERRORS THAT 
MAY APPEAR IN THIS MANUAL . 

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THf 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLF COMPUTER 
SYSTEM AND CAN BE COPIED (WITH INCLUSION OF DIGITALS 
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 
0T>t1WlSE BE PROVIDED IN WRITING BY DIGITAL, 

DIGITAL EQUIPMENT CORPORATION ASSLHES NO RESPONSIBILITY FOR 
THE USE OR RELIABILITY Qf ITS SOFTWARE ON EQUIPMENT THAT IS 
NOT SUPPLIED BY OIGITAl . 

COPYRIGHT (C) 1975,1953 DIGITAL EQUIPMENT CORPORATION 
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6.0 DEVICE/OPTION SETUP 

\0 TEST SEQLtNCE 

».n OPERATION OPTIONS 

9,0 NUN STANDARD PRINTOUTS 
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1.0 ABSTRACT 



BEA IS AN I0M0D THAT CAN HANDLE FROM 1 TO 12 UNIBUS EXERCISERS. THE 
MODULE WILL HAVE THE UBE(S) DOING DATKS), DATOBCS), OATIP(S), AND 
DATO(S), THEN CHECKS FOR CORRECT DATA TRANSFERS. THESE TRANSFERS ARE 
DONE FIRST ON AN NPR LEVEL HNO INTERRUPTS WITH A BR7.THEN THE REQUEST 
IS SEQUENTIALLY LOWERED TO A BR4 . 

2.0 REQUIREMENTS 



HARDWARE : 

1 TO 12 LEECS); WITH MORE THAN ONE UBE , ALL SHOULD HAVE Wl JUMPER 
EXCEPT THE UBE THAT IS THE FURTHEST FROM THE PR0CES50R ELECTRICALLY. 



SOFTWARE: 



STORAGE;; BEA REQUIRES: 

I. DECIMAL WORDS: 1371 
P. OCTAL WORDS: 02533 
3. OCTAL BYTES: 5266 

3.0 PASS DEFINITION 

1 ITERATION CONSISTS OF SETTING UP ONE OR MORE UBECS) TO DO DATA 
TRANSFERS, THEN CHECKING THOSE TRANSFERS. 1 PASS WILL EQUAL 12,000 
ITERATIONS. 

4.0 EXECUTION TIMF 

ONE PASS WILL RUN IN APPROX. 1 MINUTE, RUNNING ALONE ON AN 11/45, 

5.0 CONFIGURATION REQUIREMENTS 



DEFAULT PARAMETERS: DEVADR - 170000 j VECTOR-SlOj BRW. BR2-6j DEVCNT-i 
REQUIRED PARAMETERS: NONE 

6.0 DEVICE/CPTION SETUP 



1 TO 15 U6EfS)j UITH MORt TH^N ONf UBE , All SMOU HAVE Wl JUMPER 
EXCEPT THE JGt THAT IS THE FURTHEST FROM THE PROCESSUS ELLC TRICALL1 . 



br'l 
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7,0 TEST SEQUENCE 

A. LOAD DEVICE INTR VECTORS AND GET READ AND WRITE BUFFER SIZES, 

B. INITIALIZE REGISTERS. 

C. GET PHYSICAL ADDRESSES FOR WRITE AND READ BUFFERS. 

D. CLEAR DEVICE REGISTERS AND WRITE BUFFER AREA} AND SET UP 
READ BUFFER AREA. 

F. CHECK FOR DEVICES AND IF NONE LEFT, GO TO H. 

F. LOAD DEVICE REGISTERS FOR DESIRED TRANSFER. 

n. GO BACK TO E, 

H. SET C^F ALL DEVICES SIMULTANEOUSLY. 

x. WAIT FOR THEIR INTERRUPTS. 

J. IF NOT ALL DEVICES INTERRUPTED, GO BACK TO I. 

K. CHECK THE BUFFER AREAS FOR CORRECT TRANSFERS. 

L. ROTATE REQUEST LEVELS ANO DATA PATTERNS. 

M. IF THIS IS NOT THE FINAL ITERATION, GO BACK TO D. 

N. INDICATE END OF PASS AND GO BACK TO B. 

e.O OPERATION OPTIONS 



THE FIRST REGISTER ADDRESS OF EACH UBE PROCEEDS IN INCREMENTS OF 20. 
EVERY BIT OF DVlOl CORRESPONDS TO A PARTICULAR U6E ADDRESS BEING 
PRESENT, I.E., BIT SET - U8E ADDRESS Of 170000, BIT I SET - UBE 
ADDRESS OF 170020, BIT ? SFT « UKt ADDRESS OF 170040, ETC. 

THE U6E(S) CAN BE ON THE 3US IN ANT ADDRESSING SEQUENCE. THE ONLY 
REQUIREMENT IS THAT QV1QI REFLECTS THE ADDRESSES OF EXXSUNU UUECS)* 
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9,0 NON- STANDARD PRINTOUTS 



ALL PRINTOUT HAVE THE STANDARD FORMATS DESCRIBED IN THE DEC/XU 
DOCUMENT WITH THE FOLLOWING ADDITIONS PRINTED BELOW IT; 

1. FOR DATA TRANSFER ERRORS (DATI/P OF DATO/B) THE CONTENTS OF 
THE FOLLOWING REGISTERS PRE -PRINTED AS WELL AS THE MEMORY 
LOCATION ANO CONTENTS. THERE SHOULD BE A DISCREPANCY BETWEEN 
BEDB AND CONTENTS OF MEMORY ON ERRORS. 

BEDB BECC BEBA BECR1 BECR2 MEM-ADDR MEM-CONTENTS 

2, FOR "INTERRUPTS ON ERROR - NOT ON DONE" THE ABOVE REGISTERS 
WILL ALSO Bt PRINTED OUT EXCEPT DISREGARD THE MEMORY ADDRESS 
AND CONTENTS SINCE IT IS NOT PREVIOUSLY SET UP. 

3* FOR "NOT ALL DEVICES INTERRUPTING" ERROR* ONLY TWO ADDITIONAL 
REGISTERS ARE PRINTED DV ANO MASK. DV IS A TEMPORARY 
STORAGE LOCATION FOR DVID1 ANO MASK IS THE LOCATION 
INOICATTNG WHICH DEVICES INTERRUPTED. BIT COMPARISON OF 
THESE TWO REGISTERS WILL INDICATE WHICH DEVICES OID OR DID 
NOT INTERRUPT, 



L 
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SEQ 6 



EDIT 
001 



R. SOLER 



DATE 
25-APR-83 



REASON 

DATA ERRORS WHEN RELOCATING 
READ BUFFER OVERLAID ON 32K 
BQUNORY DURING RANDOM RELOCA- 
ATION, CLOSE PR0317 AND 1328. 
EA BITS WHERE NOT BEING SETUP 
FOR THE WBUFEA, 



229 000000 
000000 



000000 






000000 


102 


105 


000003 


103 


040 


000005 


000 




000006 


170000 




000010 


000510 




000012 


340 




000013 


300 




000'tl4 


000001 




000016 


000000 




000020 


000000 




000022 


000000 




000024 


000000 




000026 


140000 




000030 


00O410' 




000032 


000224 ' 




000031 


000000 




000036 


012000 




000040 


000000 




000042 


000000 




000044 


000000 




000046 


000000 




000050 


000000 




000052 


000000 




000054 


000000 




000056 






000056 


000000 




000060 


oooooo 




000062 


000000 




000064 


oooooo 




000066 


oooooo 




0000 70 


oooooo 




0000 72 


oooooo 




0000/4 


oooooo 




0000 76 


oooooo 




000100 


QQQUQO 




oooio^ 







IOMOD <BEAC >, 170000, 510, 7, 6, ,5.2000,73 

MODULE 140000, BEAC , 170000,510, 7 ,6, , 12000, 73,,, #l 
.TITLE BEAC DEC/X11 SYSTEM EXERCISER MODULE 

j DDXCOM Vt-RSION 6,4 28JAN-82 
.LIST \\ iN 

Bl UN; 
101 MOJNAM: .ASCII /BEAC / jMODULE NAME. 

USED TO KEEP TRACK OF WBUFF USAGE 

1ST DEVICE ADDR. 

1ST DEVICE VECTOR. 

1ST BR LEVEL. 

2ND BR LEVEL. 

DEVICE INOICATOR 1. 

SWITCH REGISTER 1 

SWITCH REGISTER 2 

SWITCH REGISTER 3 

SWITCH REGISTER 4 

STATUS WORD. 

MODULE START ADDR. 

MODULE STACK POINTER. 

PASS COUNTER. 

* OF ITERATIONS PER PASS- 12000 

LOC TO COUNT ITERATIONS 

LOC TO SAVE TOTAL SOFT ERRORS 

LOC TO SAVE TOTAL HARD ERRORS 

LOC TO SAVE SOFT ERRORS PER PASS 

LOC TO SAVE HARD ERRORS PER PASS 

9 OF SYS ERRORS ACCUMULATED 

HOLDS RANOOM WHEN RAND MACRO IS CALLED 

RESERVED FOR MONITOR USE 

RFSERVED FOR MONITOR USF 

RESERVED FOR MONITOR USE 

IOC TO SAVE RO, 

LOC TO SAVE Rl. 

LOC TO SAVF R2. 

LOC TO SAVE R5. 

LOC TO SAVE R4 . 

i OC TO SAVt R5. 

I OC TO SAVE R6. 

AUOR Ok CURRENT CSR. 

AUUR OF GOOD DATA t OR 



XFLAG: 


.BYTE 


OPEN 


ADDR: 


170000i 





VECTOR- 


510*0 




BR1: 


.BYTE 


PRTY7*0 


BR2: 


.BYTE 


PRTY6>0 


DVID1: 


♦ 1 




SRI: 


OPEN 




SR2t 


OPEN 




SR3: 


OPEN 




SR4: 


OPEN 




STAT: 


140000 




INIT: 


START 




SPOINT 


MODSP 




PASCNT 







ICONT; 


12000 




ICOUNT 







SOFCNT 







HRDCNT 







SOFPAS 







HRDPAS 







StSCNT 







R ANNUM 







CONFIG 






RFS1 









RES2 









SVRO 




OPFN 




SVR1 




OPFN 




SVR2 




on N 




SVR^ 




OPtN 




k >VR4 




OP* N 




SVR5 




OPEN 




SVR^. 




OPF N 




C'»«A 




UHEN 




SUAQf 


<; 







1 



BIAC MC'Xll 
DbC/Xll S'rST 
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000 10,? 
000104 
000104 

00 3106 
000106 
000110 

ooo up 

000114 
000116 
000 120 
0001i>c? 



000000 

000000 

000000 
000000 
000554 
000000 

000000 
000000 
0000/3 
000040 



OOOite* 



ACSR: 


OPhN 


WASADR: 




ASTAT: 


OPEN 


ERRTYP; 




ASB; 


OPEN 


AWASs 


OPEN 


R^TRT; 


RESTRT 


WDTO: 


OPEN 


UDFR: 


OPEN 


INTR; 


OPEN 


IDNUMj 


73 




,RFPT 




.Nl.ISI 




.WORD 




.LIST 




.ENDR 


MODSP: 




; 4444444444444 



SPSU 




SEQ 7 



l CONTENTS OF CSR. 

lADDR OF BAD DATA, OR 

{STATUS REG CONTENTS, 

j TYPE OF ERROR 

jEXPECTED DATA. 

j ACTUAL DATA. 

{RESTART ADDRESS AFTER END OF PAS5 

j WORDS TO MEMORY PER ITERATION 

jWORDS FROM MEMORY PER ITERATION 

10 OF INTERRUPTS PER ITERATION 

{MODULE IDENTIFICATION NUMBER-73 

{MODULE STACK STARTS HERE. 



444444444444444444444444444444444444444444444444444444444444444444 



:3o 



II 
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SEQ a 



232 






233 






25i 






252 


000224 


000000 


253 


000226 


137777 


254 


000230 


000000 


255 


000232 


100000 


256 


000234 


000000 


25/ 


000236 


170C14 


258 


000240 


000000 


259 


000242 


000000 


260 


000244 


000000 


261 


000246 


1 70000 


262 


OO0250 


000740 


263 


000252 


000360 


264 


000254 


000240 


265 


000256 


000170 


266 


000260 


OO0140 


267 


000262 


000120 


268 


000264 


000000 


269 


000266 


000000 


270 


000270 


000000 


271 


000272 


ooocoo 


272 


000274 


000000 


2 73 


000276 


000000 


274 


000300 


C 00000 


275 


000302 


000000 


2 76 


OO0304 


000000 


2^7 


000306 


000000 


273 


OOO310 


oooooo 


2 79 


000312 


oooooo 


200 


000314 


oooooo 


281 


000316 


003444* 


282 


000320 


oooooo 


283 


000322 


oooooo 


284 


000324 


004406' 


285 


000326 


oooooo 


286 


000330 


oooooo 


28 7 


000332 


000360 


288 


000354 


oooooo 


289 


000336 


oooooo 


290 


000540 


oooooo 


29. 


000542 


ooooco 


292 


000544 


004100 


29o 


0O0546 


OC5500 


294 


000550 


022500 


295 


000352 


003100 


296 


000354 


000060 


29 7 


000356 


007 740 


298 


000360 




299 


000360 


OOOOOO 


300 


000362 


OOOOOO 


301 


000364 


OOOOOO 


;.3o L : 


000366 


OOOOOO 


?>()~S 


000^70 


OOOOOO 


504 


OUo.-)/.' 


GC? r , 74' 


305 


000374 


OOOOOO 



.ENABL AMA 



PI 

P2 

P3 

P4 

ROTCNT, 

S1MLG0 

DV: 

MASK j 

MORE: 

B12T15 

BUTS2: 



DEVCNT 

DOOI: 

SVDOOI 

SAVR1 

SAVR5 

BYTCC 

WCC: 

RCC: 

DOCNT 

DICNT 

EABIT 

RBUT: 

WBUF: 

W8UFVA 

WBUFPA 

W6UTEA 

RBUFVA 

RBUFPA 

RBUFEA 

RBUFSZ 

RBFADR 

ENORBE 

WBFAOR 

F.NOUBF 

:<fri 

XFR2 
XFR3 

XFR4 

RQLVL: 

LRBIIS 

DVREGS 

OB 

cc 

BA 

CR1: 

CR2: 

BAOMFM 

BADRj 





137777 



100000 



170014 







1 70000 

740 

360 

240 

170 

?40 

120 



O 

o 





















WRTOUT 

OPEN 

OPEN 

REEDIN 

OPEN 

OPEN 

560 









4100 

5500 

22500 

3100 

60 

7 740 







o 

RADR 





1ST DATA PATTERN 

2ND DATA PATTERN 

3RD DATA PATTERN 

4TH DATA PATTERN 

COLTER FOR * OF TIMES DATA ROTATED 

ADDR TO SET OFF ALL DEVS SIMULTANEOUSLY 

TEMP STORAGE FOR DVID1 

USED TO DROP ANY DEV NOT INTERRUPTING 

WORKING STORAGE FOR DVID1 

USED TO CLEAR BITS 12 THRU 15 



SIZE FOR 1 
SIZE FOR 2 
SIZE FOR 3 
SIZE FOR 4 
SIZE FW 5 
SIZE FOR 6 
TOTAL NUMBER 
DATO OR DATI 



DEV 

DEVS 
newt: 



DEVS 

DEVS 

DEVS 

OF DEVS 
INDICATOR 



STORAGE FOR 
LOC TO SAVE 
LOC TO SAVE 
CYCLE COUNT 
CYCLE COUNT 
CYCLE COUNT 



<f OF 
OF 
USED 
SIZE 
SIZE 



DEVS 
DEVS 



DODI 
Rl 
R5 

FOR A 
FOR A 
FOR A 
DOING A 
DOINGA 



BYTE 
DATO 
DATI 
DATO/BCS) 
DATI/PCS) 



TRANSFER 



TRANSFER 
TRANSFER 



TO SET EXTENDED MEMORY ADDR BITS 

OF BUFFER FOR DATI/PCS) 

OF BUFFER FOR DATO/BCS) 
VIRTUAL ADDR OF WKITE BUFFER 
PHYSICAL ADDR OF WRME BUFFER 
EXT MEM ADDR BITS SET BY MONITOR 
VIRTUAL ADDR OF READ BUFFFR 
PHYSICAL ADDR OF READ BUFFER 
EXT MEM AODR BITS SET BY MONITOR 
TOTAL SIZE OF BUFFER RESERVED FOR READS 
USED TO POINT TO LOC WITHIK' RBUFSZ 
USED FOR LAST ADDRCPHYSICAL ) OF READ BUFF 
♦JSED TO POINT TO LOC WITHIN WBUFSZ 
USED FOR LAST ADDRCPHYSICAL) OF WRITE BUFF 
FUN 2-DATI-INTR 
FUN 2-DAT06-INTR 
FUN i -DAI IP/NO ROT-INTR 
'UN 1 DATO-INTR 

USED TO SET REQUEST LEVELS OF DEVS 
USED TO CHECK IF ANY ERROR BITS SET 

DFV DATA REG CONTENTS 
DEV CiCLE COUNT CONTENTS 
DEV ADDR RFC CONTENTS 
DLV CR1 REG CONTENTS 
OF ' CR2 RFG CONIENTS 
BAD MFM0R> ADDR 
CONTENTS OF DAD MEMORY 
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SEQ 9 



306 

307 
308 
309 
310 
311 
312 
313 
314 
315 
316 
31V 
318 
319 
320 
321 
322 
323 
324 
325 
326 
327 
328 
329 
330 
331 
332 
333 
354 
335 

336 
33/ 
3 58 
339 

340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
355 
356 
337 
358 
359 
560 



OC0376 
000400 
000400 
000402 
000404 
000406 

OO0410 
000416 
000424 
000432 
000436 
000440 
000442 
000444 
000452 
000460 
000464 
000466 
0004 74 
000f02 
000510 
000516 
000520 
00'>524 
000524 
000530 



000534 
000534 
000542 
000550 

000556 
000564 
000572 



177777 

000240* 
000242* 
17 77/7 
000000 

012737 
012737 
012737 
013700 
006200 
001412 
103375 
062737 
062737 
005237 
000764 
013737 
043737 
013737 
013737 
001002 
000137 

004737 
004737 



000606 
OC0612 
000620 
000626 



104415 
013737 
062737 

104415 
013737 
062737 



000361 
000361 
000001 
000014 



000114* 
000116' 
000120' 



000361 000114* 
000361 000116' 
000120' 

000014' 000240' 

000246' 000240' 

000240' 00O242* 

000240' 000244' 

001404' 

001646' 
001410' 



000000' 000324' 

000326* 000336' 

000736 000336' 

000000' 000316' 

000320' 000342' 

000736 000342* 



177777 
DVMASK} 
PT' i: DV 
PT*2; MASK 

-1 
TJCNT: 



j THIS P0IN1ER IS USED SC THE NEXT 

I TWO LOCATIONS UIILL BE PRINED OUT FOR 

i AN ERR WHCIH DEVICES DID NOT INTERRUPT 



TART 



2$: 



3* 



1$: 



MOV 

MOV 

MOV 

MOV 

ASR 

BEQ 

BCC 

ADD 

ADD 

INC 

BR 

MOV 

BIC 

MOV 

MOV 

BNE 

JMP 

JSR 
JSR 



j TIME OUT COUNTER 

4361.UDT0 

0361.WDFR 

41.INTR 
DVID1.R0 

RO 
3 J 

2$ 

0361.WDT0 

0361, WDFR 

INTR 

2t 

DVID1.DV 

B12T15,DV 

DV.MASK 

DV.MORE 

li 

DROP 

PC.CLRREG 
PC. SETUP 



AT LEAST 361 WORDS TO MEM/ITERATION 

AT LEAST 361 WORDS FROM MEM/ITERATION 

AT LEAST 1 INTERRUPT /ITERATION 

SAVE DEV COUNT 

SHIFT IN A COUNT 

BR OUT IF NONE LEFT 

BR BACK IF NO BIT IN THIS POSITION 

361 MORE WORDS TO MEM 

361 MORE WORDS FROM MEM 

1 MORE INTERRUPT 

GO CHECK FON MORE 

MOVE DVID1 TO TEMP STORAGE 

ENSURE BITS 12-15 ARE CLEARED 

INIT MASK BITS EQUAL. TO DVI01 

THEN SET UP WORKING AREA 

GO TO II IF THERE PRE DEVS 

ELSE DROP THE MODULE 



CLEAR AuL DEV REGS 
SET UP AVAILABLE VEC 
GET BUFFER SIZES FOR 



LOCATIONS 
DATO(S) 6 



ANO 
DATICS) 



;********************++**+***+**++*«*++*+++**+*+*+ 



{NOTE: IN THE FOLLOWING COMMENTS THE TERM READ IS USED 
j TO DE!KDTE DATI OR DATIP AND THE TERM WRITE DENOTES 
jDATO OR DAT06. 

1***********************************************4* 

j THIS IS THE LOCATION THE PROGRAM WILL PROCEED 
jWITH AFTER AN ENO OF PASS 



RESTRT: 



GETPAI, BEGIN, RBl^VA 
MOV RBUFPA.ENDRBF 

ADD 736.ENDR8F 

GETPAS, BEGIN, WBUFVA 
MOV W6L*PA,EN0WBF 

ADD 0736.ENDWBF 



jRSOOl JSR 
000600 012 73 7 000001 000266' MOV 



00503/ 
012737 
012737 
012737 



000234' 
000224' 
000 344 
OOOOOO 



0002 .V 
0002^4' 
0003^4* 



CIR 
MOv 
MOV 
MOV 



PC, FAB ITS 

Ol.DODI 

ROTCNT 
♦P1.SAVR1 

OXFR1.SAVK5 
OfcQ^RQLVL 



jGET PHYSICAL ADDRESS FROM 16 BIT RBUFVA 
j MOVE READ BUFF ADDR TO END OF -READ BUFF REG 
{ADD 736 TO GET LAST ADDR OF BUFFER 

{GET PHYSICAL ADDRESS FROM 16-BIT WBUFVA 
jMOVE URITE BLFF ADDR TO EMO-OF -WRITE BUFF Rbli 
{ADD 736 TO GET LAST ADDR OF BUFFER 



i SET BITS 6 1 OF REA EQUAL TO 
jBITS 4 C 5 r RBUFEA RESPECTIVELY 
I INIT XFER L*OICATOR TO 1 SO THE 
(1ST INC WILL SIGNIFY A DATI 
{CLEAR PATTERN ROTATION COUNT 
j INIT SAVR1 TO 1ST PATTERN 
{INIT SAVR5 TQ 1ST tf'ER FUNCTION 
I INIT REQUEST LEVEL TO NPR/1NTR OR 7 



K'l 
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SEQ 10 



361 

36? 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 

393 

394 

395 

396 

397 

398 

399 

400 

401 

402 

403 

A04 

405 

406 

407 

408 

409 

410 

411 

412 

413 

414 

415 

4 16 

417 



I THIS IS THE LOCATION THE PROGRAM WILL PROCEED WITH 
{AFTER AN ITERATION 



000634 
0O0634 
0C0642 
000644 
000650 
000650 
000656 
000664 
000672 
000674 
000700 
000700 

000704 
000710 
000716 
000724 
000732 

000740 
CX>7A0 
000744 
000746 
000750 
000754 
000756 
000756 
000762 
000766 
0007 74 
0007 76 
001002 
001004 
001004 



001010 

oomo 

001014 
001016 
001J20 
001022 
001030 
001032 
001036 

001042 
001046 
001052 

00 i0'">4 
001054 



023737 

001402 
004 737 

013737 
013737 
013737 
001002 
000137 

004737 

013700 
013737 
1 0737 
(13737 
1A3737 



006u x 37 
1034u* 
0014^2 
062700 
000771 

004 737 
00523 7 
03273 7 
C01003 
004 73 7 
000402 



000242' 000240' 

001410' 

000266' 000270' 

0C0242' 000244' 

000242' 000240' 

001404* 

002464' 

000006 ' 

000320' . 00340' 

000314' 000340' 

000326' 000334' 

000312' 000334* 



RERESTj 



1$ 



2* 



004737 
012120 
011220 
011320 
013760 
012510 
053/10 
062700 

010137 
010537 
000732 



000244' 



000020 



001742' 
000266* 
000001 000266' 

002070' 



3$: 



4$: 



004737 002016 1 



5$: 



CMP MASK.DV 

BEQ 1* 

JSR PC .SETUP 

MOV DODI.SVDODI 

MOV MASK, MORE 

MOV MASK.DV 

BNE 2$ 

JMP DROP 

JSR PC.RESDAT 

MOV ADDR.RO 

MOV WBUFPA,UBFADR 

sue weuF,we p >\DR 

MOV RBUFPA.MFADR 

SUB RBUF.RBfADR 



ASR MORE 

BCS 4$ 

6 .Q GO 

A J 020, RO 

BH 3* 

jsr pc.chekpx 

inc doo: 

bit obito.dodi 

BNE 51 

JSR PC,RREGS 

BR 6$ 

JSR PC.WREGS 



OE DEVS THAT SHOULD INTR-tf OF DEVS THAT DID? 

IF EQUAL, GO TO 2* 

ELSE GET NEW DEV COUNTS £ BUFFER SHES 

SAVE DODI SETTING 

RESET MORE BITS 

IF ANY OEVS DROPPED, ALTER DV 

IF NOT, CONTINUE ON 

ELSE DROP MODULF 

RESTORE DATA IN READ BUFFER 
AND CLEAR WRITE BUFFER 
PUT DEVICE ADR INTO REG. 
USE JBFADR AS WRITE BUFF ADDR 
XNIT TO WRITF BUFF LESS WBUF 
USE rUlFADR AS READ BUFF ADDR 
INIT TO READ BUFF LESS RBUF 



CHECK FOR ANOTHER DEV 
IF THERE, CONTINUE 
AND IF NOT, GO TO GO 
ELSE ADD 20 FOR NEXT ADDR 
AND CHECK FOR MORE 

SEE IF Rl £ R5 NEED INITIALIZATION 

INC XFER INDICATOR 

IF BIT OF OODI IS 1 

GO SET UP REGS FOR DATOCS' 

ELSE SET UP REGS FOR OATI(S) 

GO LOAD THE REGISTERS 

{SET REGS FOR WRITE XFER INFO 



;AT THIS POINT THE DEVICE REGISTERS WILL BE LOADED TO DO 
{TRANSFERS 



002234 



000310' 000010 

000354* 
000012 

000272' 
000274' 



6*t 



005037 000406' 



GO! 



JSR 
MOV 

MOV 
MOV 
MOV 
MOV 
BIS 
ADO 

MOV 
MOV 
BR 

CLR 



PC.EABITS 

(R1)..(R0)* 

(R2).(R0)» 

(R3),(R0)» 

EABIT.IO(RO) 

(R5)*,(R0) 

RQLVL.(RO) 

*12,R0 



{SET 
{SET 
{SET 
{SET 
{SET 
{SET 
{SET 
j ADD 



EXTENDED ADDRESS BITS 
UP DATA BUFFER REG 

CYCLE COUNT REG. 

ADDR REG 

EXT ADDR BITS IN CR2 

CR1 

REQUEST LEVELS 
12 TO GET NEXT DEV ADDR 



IN EABIT 



;RS001 



UP 
UP 
UP 
UP 



Rl 
R5 
3J 



SAVR1 
SAVR5 



TOCNT 



{SAVE CONTENTS OF RUi.AST 
{SAVE CONTENTS OF R5(LAST 
{GO LOAD ANOTHER DEVICE 

{CLEAR TIME OUT COUNT 



DATA 
XFF.R 



PATTERN) 
INSTR.) 



1. 1 
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SEQ 11 



418 


001060 


005037 


000242' 






CLR 


MASK j 


419 
















420 


001064 


005277 


1.77146 






INC 


SJSIMLGO i 


421 


001070 








BRKs 






422 


001070 


104407 


000000' 






BREAK * 


.BEGIN ; 




001074 


104407 


000000' 






BREAKS 


♦BEGIN j 


423 


001100 


023737 


000240' 


000242' 




CMP 


DV.MASK i 


424 


001106 


001411 








BEQ 


jATACK j 


425 


001110 


005337 


000406 ' 






DEf 


TOCNT j 


426 


001114 


001365 








BNE 


BRK } 


427 


001116 


104403 


000000' 


003204' 




MSGN$, 


BEGIN, NOINTR j 


428 


001124 


005004 








CLR 


R4 i 


429 


001126 


004737 


002564 ' 






jSR 


PC.tJETDEV i 


4 30 
















431 


001132 








DATACK: 






4 32 


001132 


013737 


000240' 


000244' 




MOV 


DV.MORE i 


433 


001140 


013737 


000270' 


000266' 




MOV 


SVDODI.DODI i 


434 














1 


435 


001146 


013700 


000006' 






MOV 


ADDR.RO { 


436 


001152 


012737 


004406' 


000334' 




MOV 


OREEDIN.RBFAOR I 


437 


001160 


012737 


003444 4 


000340' 




MOV 


*WR TOUT ,WBF ADR { 


438 


001166 


005003 








CLR 


R3 t 


439 


001170 








MORDEV : 






440 


001170 


006237 


000244 • 






ASR 


MORE ; 


4<1 


001174 


103405 








BCS 


2* ; 


442 


001176 


001001 








BNE 


IS J 


443 


001200 


00044 7 








BR 


NPASS i 


444 


001202 








1$: 






445 


001202 


062700 


000020 






ADO 


020.R0 j 


446 


001206 


000770 








BR 


MORDEV j 


447 


001210 








2*: 






448 


001210 


105/60 


000006 






TSTB 


6CR0) j 


449 


001214 


100407 








BMI 


3$ ; 


450 


001216 


104403 


000000' 


003164' 




MSGN*. 


BEGIN. NOSE T j 


451 


001224 


005004 








CLR 


P4 , 


452 


001226 


004737 


A/v **.;o* 






JSR 


PC.BDDATA j 


453 


001232 


000426 








BR 


NXT j 


4%a 


001234 








3$: 








001234 


033760 


000356' 


000016 




BIT 


ERRITS.16CR0) j 


4' 


001242 


001407 








BEQ 


41 | 


457 


001244 


104403 


000000' 


003170' 




MSGnU, 


BEGIN. ERRSET j 


458 


001252 


005004 








CLR 


R4 ; 


459 


001254 


004 73 7 


002640' 






JSR 


PC.BDDATA ; 


460 


001260 


000413 








BR 


NXT { 


461 


001262 








4$s 






462 


001262 


005237 


000266' 






INC 


DODI j 


463 


001266 


032737 


000001 


000266' 




BIT 


06ITO.DODI j 


464 


001274 


001003 








BNF 


5* j 


465 


0012 76 


004737 


002110' 






JSR 


PC.OIDATA j 


466 


001302 


000402 








BR 


NXT i 


407 


001304 








51: 






468 


001304 


004737 


002162' 






JSR 


PC.DODATA i 


469 


001310 








NXT: 






4 70 


001310 


062 700 


000020 






ADO 


020.R0 ; 


4 71 


001314 


C00137 


0011.70' 






JMP 


MORDtV j 


At? 


001320 








NPASS: 






473 


001320 


004737 


00164b* 






JSR 


PC.CLRREG j 



CLEAR ALL BITS IN MASK 

TO BE RESET IN INTR SERV RTNS 

SET OFF ALL DEVS 

TEMPORARY RETURN TO MONITOR 

THEN CONTINUE AT NEXT INSTRUCTION, 

ALL DEVS INTR? 

IF YES, GO TO DATACK 

ELSE DEC TIME OUT COUNT 

AND BREAK IF NOT 

ASCII MESSAGE CALL WITH COMMON HEADER 

R4 INVALID IN ERR REPORT 

REPORT NON-INTR'G DEVICES 



SET UP MORE 

RESTORE DOCI TO SETTING WHEN 

LOADING 1ST DEV 

INIT RO TO 1ST DEV ADDR 

RBFA0R-1ST LOC IN READ BUFFER 

WBFADR"1ST LOC IN WRITE BFFER 

USED IN DODATA RTN 

CHECK FOR OTHER DEVS 

IF THERE CONTINUE 

IF SOME LEFT, GO CHECK FOR MORE 

ELSE CO TO END OF PASS RTN 

GET NEXT DE\/ ADDR 

GO CHECK FOR THAT DEV 

IS READY BIT SET IN CR1? 

IF SET. CONTINUE 

ASCTI MESSAGE CALL WITH COMMON HEADER 

R4 INVALID IN ERR REPORT 

ELjE TYPE OUT CONTENTS OF ALL DEV REGS 

AND GO CHECK FOR NEXT DEV 

SEE IF ANY ERROR BITS SET 

IF NONE S*T, CONTINUE 

ASCII MESoAGE CALL WITH COMMON HEADER 

R4 INVALID IN ERR REPORT 

ELSE TYPE OUT CONTENTS OF ALL DEV REGS 

AND GO CHECK FOR NEXT DEV 

INC XFER INDICATOR 
D.'UI OR DATO ? 
IF DATO, GO DO IT 
CHECK DATI XFERS 
CHECK FOR NEXT DEV 

CHECK DATO XFERS 

ADD 20 FOR NEXT DEV ADDR 
GO CHECK FOR ANOTHF,, DEV 

CLEAR ALL DEV REUS 



M 



Ml 
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5EQ 12 



4 74 001524 


004 737 


00236 3' 


475 001330 


022737 


000352' 000274' 


'.76 001336 


001010 




477 






4", 8 






479 






480 






481 






482 00x340 


022737 


000020 000234* 


483 001346 


001404 




484 001350 


005 77 


000234' 


485 001354 


00<*?o7 


002424' 


486 001360 






487 001360 


032737 


000001 000264' 


488 001366 


001402 




489 001370 


004737 


0C,">766' 


490 






491 001374 






001374 


104413 


000000' 


492 001400 


000137 


000(k*.4 ■ 


493 






494 






495 001404 






496 001404 


104410 


000000' 


497 






498 






499 






500 






501 






502 






503 






504 001410 






505 001410 


005037 


000306' 


506 001414 


00503 7 


00030.*' 


507 001420 


012700 


003024' 


508 001424 


013701 


OCOOIO' 


509 001430 


012737 


000001 000266' 


510 0G1436 






511 001436 


006237 


000244' 


512 001442 


103406 




513 001444 


001420 




514 001446 


C62700 


0000 10 


515 001452 


062701 


000004 


516 001456 


000767 




517 001460 






518 001460 


005237 


000266' 


519 001464 


004 757 


001622' 


520 001470 


010021 




521 0014 72 


113721 


000012' 


522 001476 


105721 




523 001500 


062700 


00001c 


524 001504 


000754 





JSR PC,ROTRQS \ SHIFT REQUEST TO NEXT BR LEVEL 
CMP 0XFR4.SAVR5 {HAS LAST XFER BEEN DONE? 
BNE 1$ 1 IF NOT , CONTINUE 

; ***** ******* **** *****************•***.******** + ** 4. 
;*********************************, *************** 

{AFT1R P2 £ P4 HAVE BEEN ROTATED 16 TIMES, ALLOW THE POINTER 

;R1 TO INCREMENT THRU THE END OF THE READ BUFFER BUT DON'T ALLOW ROTATION 

;*+<!*********« ************************************ 
.**->** ******** .****************************.> ******* 



1$ 



2$ 



CMP 016..ROTCNT 

BEQ 1$ 

INC ROTCNT 

JSR PCROTPAT 

BIT 06ITO,DEVCNT 

BEQ 2$ 

JSR PC.SWAPCC 



FNDITS, BEGIN 



{ELSE HAS P26P4 BEEN ROTATED 16 TIMES? 
{IF YES DON'T ROTATE PATTERNS ANYMORE 
{ELSE INC ROTATION COUNT, AND 
{ROTATE DATA PATTERNS 



{IS THERE AN ODD <t OF DEVS? 
{IF NOT, GO TO 5$ 
{ELSE SWAP RCC WITH 
j WITH WBUF FOR 



WCC 6 RBUF 
CORRECT XFER INFO 



JMP 



REREST 



{SIGNAL END OF 
{MONITOR SHALL 



ITERATION. 

TEST END OF PASS 



;ELSE GO TO REREST 



********************************************************* 



DROP: 



END*, BEGIN 



************************************************** 

1************************************************* 

{THIS ROUTINE WILL SET UP THE DEVICE INTO VECTORS, COUNT THE 

{NUMBER OF DEVICES, SET THE TRANSFER SIZE OF THE READ PND VRITE 

{BUFFERS, ANO SET UP THE READ AND WRITE CYCLE COUNTS, 

• 41************************************************ 

************************************************** 



SETUP: 



CKMORE 



1$ 



CLR 


DICNT 


CLR 


DOCNT 


MOV 


0XSRL.RO 


MOV 


VECTOR. Rl 


MOV 


01. .000 1 


ASR 


MORE 


BCS 


1$ 


BEQ 


2* 


ADD 


010, RO 


ADO 


04, Rl 


BR 


CKMORE 


INC 


DODI 


JSR 


PC.INCCNT 


MOV 


RO.(Ri)* 


MOVB 


BR1,CR1)* 


TSTB 


(Rl). 


ADD 


010, RO 


BR 


CKMORE 



{CLEAR REG COUNTING DEVS DOING DATICS) 

{CLEAR REG COLNTING DEVS DOING DATO(S) 

{SET RO TO 1ST INTR SERVICE RTN 

;SET Rl TO 1ST INTR VEC ADDR 

tINIT XFR INDICATOR TO 1 

{CHECK FOR A DEVICE 

I IF THERE, CONTINUE 

{IF NONE LEFT AT ALL, GET OUT 

{ELSE INC INTR SERV POINTER BY 10 

{AND INC INTR VEC LOC BY 4 

{GO BACK AND CHECK FOR ANOTHER DEV 

{INC XFER INDICATOR 

{INC DATI OR DATO COUNT 

{MOVE ADDR OF INTR SERV RTN TO VEC LUC 

;MOVE BR1 VALUE TO PSW VEC 

{GET BACK TO AN EVEN ADDR 

{ADD 10 TO RO FOR NEXT INTR SERV RTN 

{SEE IF THERE ARE MORE DEVS 



Nl 



Nl 
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SEQ 13 



525 
526 
527 
526 
520 
530 
531 
532 
533 
534 
535 
536 
537 
538 
539 
540 
541 
542 
543 
54 4 
5* '5 
54 ' j 
54 7 
5'- 8 
549 
550 
551 
552 
553 
554 
555 
556 
557 

558 
559 
560 

561 
562 
r 63 
1 
565 
566 
567 
568 
569 
5/0 
571 
572 
573 

5/4 

575 
576 

577 



001506 
001506 
001514 
001520 
001520 
001524 
001526 
001526 
001530 
001532 
001536 
001540 

001544 
001550 
001554 
001560 
001564 

001566 
00i.>72 

0015/4 
00157* 
001600 
001600 

001604 

001610 
001614 
001620 



001622 
001622 
001630 
001632 
001636 
001640 
001640 
001644 
001644 



013757 
005337 

012700 
005001 

005720 
005201 
020137 
103773 
011037 

01103^ 
006237 
005437 
005737 
001405 

020137 
001402 

005301 
005740 



011037 000314* 



011037 
006237 
005437 
000207 



052737 
001003 
005237 
000402 

005237 

000207 



000266' 000264 
000264' 

000246' 



0C03C6' 

00031*"' 

0003C2' 
000302' 
000302' 
000304 ' 

000304 ' 



2$: 

CJPlBUF 
l$i 



2$ 



000300' 
000300' 
000300' 



MOV DODI.DEVCNT 

DEC OEVCNT 

MOV V>BUFSZ-2,R0 

CLR Rl 

TST (RO)* 

INC Rl 

CMP Rl, DICNT 

BLO 1$ 

MOV (RO).RBUF 

MOV (RO).RCC 

ASR RCC 

NEG RCC 

TST DOCNT 

BFQ 2i 

CMP Rl, DOCNT 

BEQ 2$ 

DEC Rl 

TST -(RO) 

MOV (R0),U8UF 

MOV (RO).WCC 

ASR UCC 

NEG WCC 

RTS PC 



DEV XFER INDICATOR HAS OF DEVS 
f 1, SO DEC DEVCNT BY 1 

SET RO TO SIZE TABLE 
CLEAR Rl 

MOVE POINTER TO NEXT VALUE 

INC COUNTER 

R1-* OF DATI DEVS 

IF NOT. INC COUNTED u POINTER 

ELSE RO HAS SIZE Of- ^EAD BUFF PER DEV 

1 UORD - 2 LOCATIONSCOR BYTES) 

AND ALSO IS DATI XFER COUNT 

WHEN IT IS HALVED 

GET 2'S COMP FOR DEV CC REG 

IF DOCM T IS 

GO USE THE VALUE RO POINTS TO 

Rl-0 OF DATO DEVS ? 

YES, CONTINUE 

NC, DEC Rl 

AND DEC POINTER 

RO HAS SIZE OF UIRITE BUFF PER DEV 
1 WORD - 2 LOCATIONSCOR BYTES) 
AND ALSO IS DATO XFER COUNT 
WHEN IT IS HALVED 
GET 2'S COMP FOR DEV CC REG 
; RE TURN 



********************************************************** 
•********+**+**********++*»***+******************* 

!THIS ROUTINE WILL COUNT THE NUMBER OF DEVICES DOING DATK5) 
;AND THOSE DOING DATOCS) 

i********** + *+.** + **** + ** + ****** + **t + + *+* + * + * + * + *** + 



000001 000266 
000306' 

000304' 



INCCNT 

INCDO: 

EXINC: 



BIT 
BNE 

INC 
BR 

INC 

RTS 



08ITO.DODI 
INCOO 

DICNT 
EXINC 

DOCNT 

PC 



{IF BIT o :s 1 
;G0 INC DOCNT 
sELSE INC DICNT 
{AND EXIT RTN 

{INC DOCNT 

{RETURN 



;***********************V********************************* 

************************************************* 

********* I************ *************************** 

THIS ROUTINE WILL CLEAR ALL THE REGISTERS OF ALL EXISTING DEVICES 
AS DfFINFD BY DVID1 
************************************************;. 

***fct****.*********/***************t*t*******+>. ♦ A ♦ 



B2 
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5EQ 14 



578 001646 

579 001646 

580 001654 

581 001660 

582 001660 

583 00166* 

584 001656 

585 001670 

586 C01674 

587 0O1676 
538 001676 

589 001700 

590 001704 

591 001710 

592 001714 

593 001720 

594 001724 

595 001730 

596 001732 

597 001732 

598 001740 
599 

600 
601 
602 

603 
604 
605 



606 
607 
608 
609 
610 
611 
612 
613 
614 
615 
616 
617 
618 
619 
620 
621 
622 
62? 
624 
625 
626 

627 

628 
629 

63Q 



001742 
001742 
0017*6 
001752 
001756 
001 760 
001764 
001764 
001770 
001772 
002000 
002002 
002006 
002010 
002010 
OO2014 
002014 



015737 

013701 

006237 
103404 
001421 
062701 
0O0771 

005011 
005061 
005061 
005061 
005061 
005061 
062701 
000753 

013737 
000207 



013701 
013705 
022705 
100002 

012705 

022701 
100011 
022737 
001003 
023701 
100002 

012701 

000307 



000240 ' 000244 
000006 ' 

000244' 
000020 



000002 
000004 
000006 
000010 
000016 
000020 



000240' 000244 



000272' 
000274' 
000352* 

000344' 

000232' 

000020 

000336' 

000324' 



000234 



CLRREGt 



1$ 



2*t 



3$ 



MOV 
MOV 

ASR 
BCS 
BEQ 
ADD 
BR 

CLR 
CLR 
CLR 
CLR 
CLR 
CLR 
ADD 
BR 

MOV 
RTS 



DV.MORE 
ADDR.R1 

MORE 

21 

31 

*20,R1 
1$ 

CR1) 

2(R1) 

4(R1) 

6CR1) 

10CR1) 

16CR1. 

020, RJ 

H 

DV.MORE 
PC 



I RESTORE 
iINIT Rl 



MORE 
TO 1ST 



DEV ADDR 



iIS THERE A DEVICE? 

ilf YES, GO SET IT UP 

» IF NONE LEFT, - GET 0U T 

lELSE INC Rl TO NEXT DEV ADDR 

jANO GO SEE IF IT'S THERE 

I CLEAR DATA BUFFER REG 

I CLEAR CYCLE COUNT REG 

I CLEAR BUFFER ADDR *EG 

» CLEAR CR1 REG 

j CLEAR ERROR CLEAR REG 

i CLEAR CR2 REG 

j INC Rl TO NEXT DEV ADDR 

I GO CHECK FOR ANOTHER DEV 



iRESTORE 

i RE TURN 



MORE 



j THIS ROUTINE WILL KEEP TRACK OF THE DATA PATTERNS AND TRANSFER 
FUNCTIONS USED TO LOAD THE DEVICES 

CHEKPX: 

MOV SAVR1.R1 iRESTORE Rl TO PATTERN IN SAvRl 

MOV SAVR5.R5 iRESTORE R5 TO XFR FUNCTION IN SAVR5 

CMP 0XFR4.R5 iDOES R5 POINT TO LAST XFER? 

BPL 1$ | IF NOT, CONTINUE 

MOV 0XFR1.R5 lELSE INIT TO 1ST XFER 

lit 

CMP *P4,R1 i IF Rl DOES NOT EXCEED LAST PATTERN 

BPL 3$ iADDRESS, EXIT ROUTINE 

CMP A16..R0TCNT |HAVE P2£P4 BEEN ROTATED 16 TIMES? 

EINE 2* i IF NOT.INIT Rl 

CMF EN0RBF.R1 |IS Rl AT LAST ADDR OF READ BUFF? 

BPL It iIF LESS, GO TO EXINIT 

21: 

MOV 0P1,RI lELSE INIT Rl TO 1ST DATA PATTERN 

3*: 

RTS PC iRETURN 

jTHIS ROUTINE WILL DETERMINE L r THE TRANSFER IS A QATO OR A DAT06 
lANO SET THE CYCLE COUNT APPROXIMATELY VIA R2 ANO ALSO SET R3 TO 
4 THE. CORRECT WRITE BUFFER ADORES 



C2 
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15 PAGE 8-7 



SEQ 15 



002016 
002016 
002022 
002026 
002030 
002034 
002036 
002042 
002050 
002054 
002054 
002062 
002066 



631 
632 
633 
634 
635 
636 
637 
638 
639 
640 
641 
642 
643 
644 
645 
646 
64? 

648 
649 



650 

651 002070 

652 002070 

653 002074 

654 002102 

655 002106 
656 

657 
658 

659 
660 
661 
662 



663 
664 
665 
666 
66 7 
668 
669 
670 
671 
6 72 
673 
6 74 
675 
6 76 
6/7 
6 78 
6 79 
680 
681 
682 
68& 



002110 
002110 
002114 
002120 
002124 
002124 
002126 
002130 
002136 
002140 
002144 
002146 
002146 
002150 
002152 
002152 
002160 



012702 
032715 
001412 
033715 
001407 
012702 
013737 
006337 

0637?" 
012703 
000207 



012702 
063737 
012703 
000207 



013703 
063703 

013704 

021024 
001407 
104403 
005744 
004737 
000402 

020403 
103765 

063737 
000207 



000300' 
000400 

001000 

000276' 
000300' 
000276' 

000314' 
000340' 



000302' 
000312' 
000334' 



0O0334- 
00O312' 
000334' 



000000' 
002640' 



000276' 
000340' 



000334 



003174 



MOV 


*WCC,R2 


BIT 


0BIT8.CR5) 


BEQ 


1* 


BIT 


BIT9,(R5) 


BEQ 


1$ 


MOV 


♦BYTCC.R? 


MOV 


UCC.BYTCC 


ASL 


BYTCC 


ADO 


W6UF,WBFADR 


MOV 


0WBFADR.R3 


RTS 


PC 



000312' 000334 



WREGSs 

*SET R2 FOR A DATO CYCLE COUNT 

}IF BIT 8 OF XFER FUNC IS 

I ALL SET, FINISH UP 

,IF BIT 9 OF XFER FUNCTION 

I ALL SET, FINISH UP 

jELSE SET R2-ADDR OF BYTCC 

I MOVE VALUE OF WCC TO BYTCC ANO 

iDOUBLE BY SHIFTING LEFT 
1*: jELSE LEAVE R2 - WCC 

j INC WBFADR ADOR BY VALUE IN W8UF 

iSET R3 - TO AODR OF WOFAOR 

iRETURN 

I********************************************************* 

;***+********************************************* 
{ ************************************************* 

j THIS ROUTINE WILL SET UP R3 WITH VALUES FOR DOING READS 

t ************************4************************ 
;+<** + ****4>** + *********** + **** + ******** + ********** 

RREGS * 

MOV WCC.R2 tSET R2 FOR A DATI CYCLE COUNT 

ADD RBUF, RBFADR i INC RBFADR AODR BY VALUE. IN RBUF 

MOV 0RBFADR.R3 jSET R3 - TO VALUE III RBFADR 

RTS PC jRETURN 

j***********<»***************************************s***** 
t************************************************* 

(THIS ROUTINE CHECKS FOR A CORRECT DATI TRANSFER SINCE ALL OF THE 
iREAD TRANSFER BUFFER SIZE CONTAINS THE SAME DATA, ONLY ONE. LOCATION 
iIS COMPARED WITH THE CONTENTS IN THE DEVICE DATA BUFFER REGISTER, 
j************************************************* 

;************************************************* 

DIDATA; 

MOV RBFADR, R3 j SE T R3 - 1ST ^EAD BUFF ADDR 

ADD RBUF.R3 |GET LAST ADDR BY ADDING BUFF SIZE 

MOV RBFADR, R4 t SET R4 -PRESENT REAP BUFF ADDR 
1$: 

CMP (R0),(R4)» iIS VALIE IN DEV Dm i A REG-TO THAT IN READ BUFF? 

BEQ 21 »IF EQUAL, CONTINUE 

MSGN*, BEGIN, DIERR j ASCII '1ESSAGE CALL WITH COMMON HEADER 

TST (R4) i RE TURK' R4 TO ERR LOCATION 

JSR PC.BDDATA »ANO T*PE OUT CONTENTS OF REGS 

BR 3* |G0 EXIT 
21: 

CMP R4.R3 |IS R4 » LAST XFER LOCATION? 

BIO II j IF NOT, CHECK NEXT ADDR 
3t: 

ADD RBUF, RBFADR j INC READ BUFF ADDR BY RBUF VALUE 

RTS PC jRFfURN 

j **** *** ******** ******************* **************** 4****** 



Dr 
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SEQ 16 



002162 
002162 
002166 
002172 
002176 
002176 
002200 
002202 
002210 
002212 
002216 
002220 
002220 
002222 
002224 
002224 
002232 



684 
685 

68b 
687 
688 
689 

690 
691 
692 
693 
694 
695 
696 
697 
698 
699 
700 
701 
702 
703 
704 
705 
706 
707 
708 
709 
710 
711 
712 
713 
714 
715 
716 
717 
718 
719 
720 
721 
722 
723 
724 

725 

'726 

727 

728 



729 

7 30 002264 

731 002264 

7 32 002272 

733 002274 

734 002302 

735 002M0 

736 002312 



002234 
002234 
002240 
002246 
002250 
002254 
002256 
002262 



013703 
063703 
013704 

021024 
001407 
104403 
005744 
004737 
000402 

020403 
103765 

063737 
000207 



005037 
032737 
001003 
004737 
000402 
004 73 7 
000207 



032737 
001403 
052737 
032737 
001403 
052737 



000340' 
000314' 
000340' 



000000' 
002640' 



003200 ■ 



000314' 000340' 



000310 

000001 

002264 
002322 1 



000266' 



000020 OOC3 30 



000001 
000040 



000310' 

000330' 



I****************************** ******************* 

|************************************************* 

j THIS ROUTINE CHECKS FOR CORRECT DATO TRANSFFRS ALL VALUES IN THE 
iWRITE TRANSFER BUFFER IS COMPARED WITH THE CONTENTS IN THE DEVICE 
jDATA BUFFER REGISTER 

I************************************************* 

j************************************************* 



DODATAj 



1* 



MOV 


W8FADR.R3 


iSET 


R3 


ADD 


WBUF.R3 


j INC 


R3 


MOV 


W8FADR.R4 


iSET 


R4 



2S 



3* 



CMP (R0),(R4)* 

BEQ 21 
MSGN*,BEGIN,DOERR 

TST -CR4) 

JSR PC.BDDATA 

BR 3$ 

CMP R4.R3 

BLO it 

ADD WBUF.WBFADR 

RTS PC 



• PRESENT WRITE BUFF ADDR 
BY OF XFER LOCATIONS 
- PRESENT WRITE BUFF ADDR 



iIS DEV DATA REG • VALUE IN BUFF ADDR? 
I IF EQUAL, CONTINUE 

lASCII MESSAGE CALL WITH COMMON HEADER 
jRETURN R4 TO ERR LOCATION 



j IS R4 AT LAST XFER LOCATION? 
{IF NOT .GO CHECK NEXT ADDR 

j INC WRITE BUFF BY VALUE IN WBUf 
iRETURN 



I********************************************************* 

I*********************************************** < ***.-:***** 
jIF DATO (BITO EQ 1) SET EA BITS IN W8UFEA 
jIF DATI (BITO EQ 0) SET EA BITS IN RBUFEA 

1*********************************0*********************** 



EABITS: 



1»; 
2i: 



CLR EABIT 

BIT OBITO.OODI 

BNE It 

JSR PC,REABITS 

BR 2% 

JSR PC.WEABITS 

RTS PC 



iCLEAR EXTENDED MEMORY BITS 

iDATO? 

I YES, SET EA BITS IN WBU*"EA 

iNO, SET EA BITS IN RBLTEA 

jRETURN 

iSET EA BITS IN WBUF'EA 

jRETURN 



tRSOOl 
jRSOOl 



jRSOOl 

;RS001 
jRSOOl 
{RS001 
iRSOOl 
;RS001 
iRSOOl 
iRSOOl 



I ************************************************* 



j THIS ROUTINE WILL SET THE CORRECT EXTENDED MEMORY ADDRESS BITS 

j OF THE CR2 REGISTER IN ACCORDANCE WITH THE EXTENDED MEMORY ADDRESS 

iBITS AS SET BY THE MONITOR IN RBUFEA, 

1********************+*****+*********************+ 
(**««***************«**************************.»** 



REABITS: 



H 



000002 000310* 



BIT 
BEQ 
BIS 
BIT 
BfcQ 
BIS 



#6IT4 t RBUFEA 

11 

OBITO.EABTT 

OB 1 15. RBUFEA 

2$ 

0BIT1.EABIT 



tIS 

1 1* 

iFL? 



BIT 4 OF RBUFEA SET? 
NOT, CONTINUE 



cr 



;et 



BIT o OF EABIT 
iIS BIT 5 Of RBUFEA SET? 
j If NOT, RE r URN 
lELSE SET BIT 1 OF EABIT 



Ec: 



) 
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SEQ 17 



002320 000207 



737 
738 
739 
740 
741 
742 
743 

744 002322 

745 002322 

746 002330 

747 002332 

748 002340 

749 002346 

750 002350 

751 002356 
752 

753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
7b5 
766 
767 
768 
769 
770 
771 
772 
773 
774 
775 



002360 
002360 
002366 
002370 
002376 
002400 
002400 
002404 
002412 
002414 
002422 
002422 



7 76 
777 
778 

7 79 

7 J 002424 

781 002424 

782 002430 
78? 002430 

784 0024 34 

785 002436 

786 002440 
/87 002442 

788 002442 

789 002444 

790 002444 

791 002446 



032737 
001403 
052737 
032737 
001403 
052737 
000207 



022737 
001004 
012737 
000411 

006237 
022737 
001003 
012737 

000207 



012701 

032711 
001402 
000261 
000401 

00024 1 

006011 
022701 



000020 000322' 



000001 
000040 



000002 000310 



000060 000354 
000020 000354 



000354* 

000001 000354 

000060 000354 



000226* 
000001 



2$: 



RTS 



PC 



I RETURN 



i THIS ROUTINE WILL PEk.~ORM THE SAME FUNCTION AS THE REABITS 
{ROUTINE EXCEPT TO THE WBUFEA. 



WEABITS; 



000310* 
000322' 1$: 



2$: 



BIT 0BIT4, WBUFEA 

BEQ II 

BIS O6IT0, EABIT 

BIT 06IT5, WBUFEA 

BEQ 2% 

BIS 06IT1, EABIT 

RTS PC 



iIS BIT 4 OF WBUFEA SET? 

I IN NOT, CONTINUE 

lELSE SET BIT OF EABIT? 

»IS BIT 5 OF WBUFEA SET? 

j IF NOT, RETURN 

lELSE SET BIT 1 OF EABIT 

I RETURN 



iRSOOl 
tRSOOl 



iRSOOl 
jRSOOl 
jRSOOl 
jRSOOl 
{RS001 
jRSOOl 
iRSOOl 
jRSOOl 



{THIS ROUTINE WILL CAUSE THE REQUEST LEVEL OF ALL DEVICES TO 

iBE AT A LOWER LEVEL THAN IN THE PREVIOUS ITERATION- - -ONLY 

jONE LEVEL IS SET AT ANY ONE TIME EXCEPT FOR AN NPR .THEN AN INTERRUPT 

{LEVEL MUST BE SET FOR HARDWARE CONSIDERATIONS 



tIS REQUEST AT NPR WITH BR7 INTR? 
I IF NOT, CONTINUE 
{ELSE SET REQUEST LEVEL TO RR7 
lANO RETURN 

{SHIFT REQUEST LEVEL TO NEXT BR 
j IF REQUEST LEVEL DOES NOT - 1 
{THEN RETURN 
{ELSE RESET REQUEST TO NPR/BR7 INTR 

{RETURN 



ROTRQS; 








CMP 


060.RQLVL 




BNE 


1$ 




MOV 


420.RQLVL 




BR 


2t 


It: 








ASR 


RQLVL 




CMP 


Ol.RQLVL 




BNE 


21 




MOV 


^60. RQLVL 



2$ 



RTS 



PC 



j***************** ************* *****************i***4****A 



000232* 



{THIS ROUTINE WILL ROTATE THE DATA PATTERNS TO TRY TO EXERCISE 
,THE DATA LINES. 

j +++**#***+*+*****+* ****************************** 



jINIT Rl TO ADDR OF ?2 

{IF BIT OF PATTERN IS 
{GO CLEAR C-BIT 
{ELSE SET C-BIT 
{AND CONTINUE 

{CLEAR C-BIT 

iROTATl DATA TO THE RIGHT 

{DOES Rl POINT TO LAST PATTERN? 



ROTPATi 








MOV 


0P2,R1 


It: 








BIT 


OfilTO.CRl) 




BEQ 


?\ 




SEC 






BR 


3$ 


21: 


etc 




3t; 








ROR 


(Rl) 




CMP 


«P4,Rl 
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SEQ 18 



792 


002452 


001403 




793 


002454 


012701 


000232' 


794 


002460 


000763 




795 


002462 






796 


002462 


000207 




798 








799 








800 








801 








802 








803 








804 


002464 






805 


002464 


012702 


004406' 


806 








807 


0024 70 


013703 


000226' 


808 


002474 


012704 


004406' 


809 


002500 


063702 


00C312' 


810 


002504 






811 


002504 


010324 




81? 


002506 


022704 


005344' 


813 


002512 


103415 




814 


002514 


020204 




815 


002516 


101372 




816 


002520 


063702 


000312' 


817 


002524 


023703 


00023?' 


818 


002530 


001403 




819 


002532 


013703 


000232' 


820 


002536 


000762 




821 


002540 






822 


002540 


013703 


000226* 


823 


002544 


000757 




824 


002546 






825 


002546 


012704 


003444* 


826 


002552 






827 


002552 


005024 




828 


002554 


022704 


004402' 


829 


002560 


101374 




G30 


002562 


000207 




831 








83? 








833 









834 
835 
836 



837 
838 
839 
840 
841 
842 
K4 3 
844 
S4S 



002564 



002570 
0025 74 
0025 76 
002576 

002602 
00£604 



012701 
013700 
005004 

030137 
Q01Q0V 



000001 
000006' 



GQG240* 



BEQ 
MOV 
BR 



4$ 

0P4.R1 
1$ 



I IF IT DOES, EXIT 

{ELSE SET Rl-LAST PATTERN ADDR 

{AND GO BACK FOR MORE 



4$: 

RTS PC iRETURN 

j************ ******* ************************************** 

5 THIS ROUTINE WILL SET UP THE READ BUFFER WITH ONE OR BOTH DATA 
i PATTERNS DEPENDING ON THE NUMBER OF DEVICES AND CLEAR THE WRITE 
{BUFFER SO THE FOLLOWING TRANSFERS CAN BE COMPARED CORRECTLY. 

; ************************************************* 

{SET R2-1ST ADDR OF READ BUFF 

SET R3- VALUE IN P? 

SET R4- ADDR OF READ BUFFER 

INC R2 TO LAST XFER ADDR 

MOVE PATTERN INTO READ BUTF ADDR 

IS R4 LAST ADDR IN READ BUFF? 

IF IT IS, GO TAKE CARE OF IT 

IS R4 AT LAST XFER ADDR? 

IF NOT, GO TO NEXT ADDR 

INC R2 TO LAST ADDR OF NEXT XFER 

IS R3 - VALUE IN P4? 

IF IT IS, GO TAKE CARE OF IT 

ELSE SET R3 • P4 

AND GO AGAIN 

RESET R3 • P2 
AND GO A3AIN 

SET R4 TO WRITE BUFFER 

CLEAR BUFFER 

END OF BUFFER? 

IF NOT, CLEAR NEXT WORD OF BUFF 

RETURN 

;********************************************************* 
.************************************************* 



RESDAT} 








MOV 


*REEDIN,R2 \ 




MOV 


P?,R3 i 




MOV 


*REEDIN,R4 j 




ADD 


RBUF.R2 , 


1$: 








MOV 


R3,CR4)* j 




CMP 


*REEDIN*736,R4 j 




BLO 


3< 1 




CMP 


R2,R4 , 




BHI 


1* J 




ADD 


RBUF.R2 , 




CMP 


P4.R3 i 




BEQ 


2$ i 




MOV 


P4.R3 i 




BR 


1$ \ 


2*: 








MOV 


P2.R3 x 




BR 


1* i 


3$: 








MOV 


OUR TOUT ,R4 » 


4$; 








CLR 


(R4)> i 




CMP 


$WR TOUT f 736, R4 i 




BHI 


4i t 




RTS 


PC i 



1 



jTHiS ROUTINE WILL COMPARE BITS IN DV WITH THOSE IN MASK TO 
{DETERMINE WHICH DEVICE5 DID NOT INTERRUPT, THEN PRINT THEM. 
j ***** ******************************************** 
;****«******************** ******* ***************** 
GETDEV: 

{SET BIT IN Rl 

* INIT RO TO 1ST DEV ADDR 

iCl.FAR R4 AS NOT USED IN HDDATA RTN 

{BIT TEST QV TO f,EE T r Of V THERE 
i IK THERE, CHECK MAiil. REG* 





MOV 


01. Rl 




MOV 


ADDR.RO 




CLR 


R4 


1$: 








BIT 


Rl.DV 




ONE 


5* 


2*; 







G2 



'"> 
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SEQ 19 



846 002604 


006^01 






84 7 002606 


032701 


010000 




848 002612 


001011 






849 002614 


062700 


000020 




850 002620 


000766 






851 002622 








852 002622 


030137 


000242' 




853 002626 


001366 






854 002630 


004 737 


002640' 




855 002634 


000763 






856 002636 








857 002636 


000207 






858 








859 








860 








861 








862 








863 








864 








865 002640 








866 002640 


010437 


0003 74* 




867 002644 


010037 


000360' 




868 002650 


013737 


000360' 


000362' 


869 002656 


062737 


000002 


000362' 


870 002664 


013737 


000362' 


000364' 


871 002672 


062737 


000002 


000364' 


8 72 002700 


013737 


000364' 


000366' 


873 002 706 


062737 


000002 


000366' 


874 002714 


013737 


000366' 


000370' 


875 002722 


062737 


000010 


000370' 


876 002730 


013737 


000366' 


000100' 


877 002736 


017737 


175424 


000102' 


878 








879 002744 


012737 


000001 


000106' 


880 








002752 


104405 


000000* 


000360' 


881 








882 002760 


005060 


000010 




883 002764 


000207 






884 








885 








886 








88 7 








888 








889 








890 








89i 








892 








893 








894 








895 








896 002766 









3$; 

GETOUT 
j ***** 



ASL 
BIT 
BNt 
ADD 
BR 

BIT 
BNE 
JSR 
BR 



Rl 

410000. Rl 
GETOUT 
420.R0 
1$ 

Rl.MASK 
2$ 

PC,BDDATA 
2$ 



lELSE SHIFT TO NEXT BIT 

{AT BIT 12? 

I IF YES, EXIT 

j ELSE GET NEXT DEV ADDR 

jAND SEE IF ITS THERE 

I DID DEV INTR? 
I IF YES, GO CHECK NEXT ONF 
{ELSE REPORT ALL ITS REGS, 
i THEN GO CHECK NEXT BIT 



RTS PC jEXIT 

**************************************************** 



I************************** 
*************************** 

j THIS ROUTINE WILL LIST ALL 
{ON REGISTERING AN INCORREC 
j ON ERROR 

2************************** 
I************************** 

BDDATAj 



MOV 


R4.BADR 


MOV 


RO.DB 


MOV 


D8.CC 


ADD 


42, CC 


MOV 


CC.BA 


ADD 


42, B A 


MOV 


BA.CR1 


ADD 


42.CR1 


MOV 


CR1,CR2 


ADD 


410, CR2 


MOV 


CR1.CSRA 


MOV 


BCR1.ACSR 



*********************** 
*********************** 

THE CONTENTS OF THE DEVICE REGISTERS 
T DATA COMPARISON OR FOR AN INTERRUPT 

*********************** 
*********************** 

I SET UP BAD MEM FOR ERR TYPEOUT 

} DB HAS DEV DATA REG ADDR 

j MOVE DB TO CC AND ADD 2 

j TO GET DEV CYCLE COUNT REG ADDR 

j MOVE CC TO BA AND ADD 2 

jTO GET O^^J BUFF ADDR REG ADDR 

I MOVf. BA TO CR1 AND ADD 2 

jTO GET DEV CR1 REG ADDR 

j MOVE CR1 TO CR2 AND ADD 10 

j TO GET DEV CR2 REG ADDR 

{GET BECR1 ADDR 

jGET CONTENTS OF BECR1 

MOV 41.ERRTYP ,DATA ERROR 

{A************************************************************** 

HRDERI, BEGIN, DVREGS j 
l*************************************************************** 

CLR 10(R0) {CLEAR ALL ERRORS 

RTS PC {RETURN 

,********************************************************* 

j************************************************* 

j THIS ROUTINE WILL SWAP READ CYCLE COUNT AND BUFFER SIZE WITH THE 
lURITE CYCLE COUNT AND BUFFER SIZE ON AN ODD NUMBER Of DEVICES 
{BECAUSE ON THE FIRST ITERATION, ASSUMING A DEVICE COUNT 0> 5, 
»3 OF THOSE DEVICES WILL BE DOING DATICS) AND THE BUFFER SI/F 
jUILL BE SMALLER THAN THE 2 DEVICES DOING DATO(S), THEN ON ThE 
,NEXT ITERATION THERE WILL BE 2 DEVICES DOING DATICS) AND 
1 3 DOING DATO(S) SO THE CYCLE COUNT AND BUFFER SIZES MUST REFLECT 
, THIS CHANGE. 

************************************************** 
j •**************************************** + ******* 

SWAPCCj 
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SEQ 20 



897 
898 
899 
900 
901 
902 
90S 
904 
905 
906 



907 
908 
909 
910 
911 
912 
*13 
914 
915 
916 
917 



918 
919 
920 
921 
922 
923 
924 
925 
926 
V2! 
928 
<*29 



002766 
002772 
003000 
003004 
003010 
003016 
003022 



003024 
003024 
003032 
003034 
003034 
003042 
003044 
003044 
003052 
003054 
003054 
003062 
003064 
003064 
003072 
003074 
003074 
003102 
003104 
003104 
003112 
003114 
003114 
003122 
003124 
003124 
003132 
003134 
003134 
003142 
003144 
003144 
003152 
003154 
003154 
003162 

003164 
003166 
003170 
003172 
0031 /4 
003176 
003200 
005202 
003204 
003206 
003210 



013702 
013737 
010237 
013702 
013737 
010237 
000207 



000302 ' 
000300 1 
000300' 
000312' 
000314' 
000314' 



052737 000001 
000002 

052737 000002 
000002 

05273 7 000004 
000C02 

052737 000010 
000002 

052737 000020 
000002 

052737 000040 
000002 

052737 000100 
000002 

052737 000200 
000002 

052737 000400 
000002 

052737 001000 
000002 

052737 002000 
000002 

052/3/ 004000 
000002 

003262' 

177777 

003514' 

177777 

005210' 

177777 

003235' 

177777 

003366' 

177777 

045 104 



000302' 



000312 



000242' 
000242' 
000242' 
000242' 
000242* 
000242' 
000242* 
000242' 
000242' 
000242* 
000242' 
000242* 



ISRli 

ISR2; 

ISR3: 

ISR4: 

ISR5: 

ISR6: 

iSRV: 

ISR8; 

ISR9: 

ISR10 

ISR11 

ISR12 



NOSET: 
ERRSET 
DIERR: 

DOERR: 

NOINTR 

101 MSSbl: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTS 



BIS 

RTI 

BIS 
RTI 

BIS 
RTI 

BIS 
RTI 

BIS 

RTI 

BIS 

RTI 

BIS 
RTI 

BIS 
RTI 

BIS 
RTI 

BIS 
RTI 

B1C 

RTI 

BIS 
RTI 

MS5G3 
-1 

MSSG4 

1 
MSSG1 

1 
MSSG2 

I 
MSSG5 
- 1 

.AtiClZ 



RCC.R2 

WCC.RCC 

R2.UCC 

RBUF.R2 

WBUF.RBUF 

R2.WBUF 

PC 



OBITO.MASK 

*BIT1,MASK 

*BIT2,MASI< 

0eiT3,MASK 

0BIT4.MASK 

0BIT5 t MASK 

OBI T6. MASK 

OBIT 7 .MASK 

*eiT6,MASK 

0BIT9,MASK 

0BIT1O.MASK 

GBIU1.MASK 



>SAVE RCC 

I GET NEW RCC FROM WCC 

j GET NEU UCC FROM OLD RCC 

I SAVE RBUF 

{GET NEW RBUf~ FROM WBUF 

j GET NEW WBUF FROM OLD RBUF 

jRETURN 



j SET BITO TO INDICATE DEV 1 INTERR'D 
j RETURN 

iSET BIT1 TO INDICATE DEV 2 INTERR'D 
jRETURN 

jSET BIT2 TO INDICATE DEV 3 INTERR'D 
j RETURN 

j SET BIT3 TO INDICATE DEV 4 INTERR'D 
^RETURN 

jSET BIT4 TO INDICATE DEV 5 INTERR'D 
I RE TURN 

,SET BIT5 TO INDICATE DEV 6 INTERR'D 
iRETURN 

iSfcT BIT6 TU INDICATE DEV 7 INTERR'D 
I RE TURN 

j SET BIT7 TO INDICATE DEV 8 INTERR'D 
jRETURN 

iSET BIT8 TO INDICATE DEV 9 INTERR'D 
jRETURN 

»SET BIT9 TO INDICATE DEV 10 INTERR'D 
j RE TURN 

jSET BIT10 TO INDICATE DEV 11 INTERR'D 
jRETURN 

jSEI Him TO INDICATE DEV 12 INTERR'D 
I RE TURN 



*DATI OR DAT IP ERROR* 



I 



- (\ 
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SEQ 21 



930 



931 



932 



933 



934 
9 55 
936 

93 7 
938 
939 



003213 
003216 
003221 
003224 
003227 
003232 
003235 
003240 
003243 
003246 
003251 
003254 
003257 
003262 
003263 
003270 
003273 
003276 
003301 
003304 
003307 
003312 
003314 
003317 
003322 
003325 
003330 
003333 
003336 
003341 
003344 
003347 
003352 
003355 
003360 
003363 
003366 
003371 
003374 

0033 7 7 
003402 
003405 
003410 
003413 
003416 
003421 
003424 
003427 
003432 

0034 35 
003440 

003444 
004406 



124 

117 

104 

111 

105 

117 

045 

124 

117 

104 

117 

105 

117 

045 

126 

105 

105 

131 

111 

116 

040 

124 

045 

126 

105 

116 

122 

120 

104 

116 

122 

122 

116 

040 

040 

116 

045 

105 

117 

117 

116 

104 

111 

050 

040 

104 

117 

111 

105 

125 

072 



005350' 



111 

122 

101 

120 

122 

122 

104 

117 

122 

101 

102 

122 

122 

104 

111 

040 

101 

040 

124 

117 

123 

000 

104 

111 

040 

124 

122 

124 

040 

040 

122 

055 

117 

117 

104 

105 

124 

040 

114 

127 

107 

105 

103 

123 

104 

040 

124 

116 

122 

120 

045 



040 
040 
124 
040 
122 
000 
101 
040 
040 
124 
040 
122 
000 
105 
103 
122 
104 
102 
040 
124 
105 

105 
103 
111 
105 
125 
105 
117 
105 
117 
055 
124 
116 
117 
000 
110 
106 
114 
111 
040 
126 
105 
051 
111 
116 
040 
124 
122 
124 
000 



MSSG2i ,ASCIZ ' *DATO OR DATOB ERROR' 



MSSG3: ,ASCIZ '^DEVICE READY BIT NOT SET 



MSSG4; .ASCIZ '^DEVICE INTERRUPTED ON ERR0R--N0T ON DONE* 



MSSG5{ .ASCIZ 'rfTHE FOLLOWING DEVICE(S) DID NOT INTERRUPT-*' 



.EVEN 

URTOUT; 
RFEDIN: 



.Bl KU 
.DLKW 



361 
361 



p 



OC_ 
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BEAC DEI 


:/Xll SYSTEM EXERCISER M 


MACRO M1200 


30-MAY-84 


09:15 PAGE 


8-15 








SYMBOL 


fABLE 


















ACSR 


000102R 


CR2 


OO0370R 


ISR1 


003024R 


PRHMSI- 


■ 000002 


SAVR1 


n»00?72R 


AODR 


000006R 


CSRA 


000100R 


ISR10 


003134R 


PRTY • 


■ 000000 


SAVR5 


0002 ?4R 


ADDR22» 


OOIOOO 


DATACK 


001132R 


ISR11 


003144R 


PRTfO ' 


• 000000 


SBADR 


0C0102R 


APTPRE* 


000200 


DATCKI- 


104411 


ISR12 


003154R 


PRTY1 - 


■ 000040 


SETUP 


00l410rt 


ASB 


000100R 


DATER*- 


104404 


ISR2 


O03034R 


PRTY2 ■ 


■ 000100 


SIMLGO 


O00230H 


ASTAT 


0001 04 R 


DB 


OO036OR 


ISR3 


003044R 


PRTY3 ' 


■ 000140 


SOFCNT 


OO0042R 


AUTO * 


000010 


DEVCNT 


000264R 


ISR4 


003054R 


PRTY4 i 


• 000200 


SOFER*- 


10440o 


AWAS 


0001 10R 


DICNT 


000306R 


ISR5 


003064R 


PRTY5 • 


■ 000240 


SOFPAS 


00004 SP 


BA 


000364R 


niDATA 


002110R 


ISR6 


003074R 


PRTY6 ■ 


■ 000300 


SPOINT 


000032R 


BADMEM 


000372R 


DIERR 


003174R 


ISR7 


003104R 


PRTY7 « 


■ 000340 


SPSIZ - 


000040 


BADR 


OO0374R 


DOCNT 


000304R 


ISR6 


003114R 


PS 


• 177776 


SRI 


C00016R 


BDOATA 


002640R 


DODATA 


002162R 


ISR9 


0O3124R 


PSW 


« 177776 


SR2 


000020R 


BEGIN 


OOOOOOR 


DODI 


000266R 


KTPRES- 


000400 


PTR1 


000400R 


SR3 


000022R 


BITO - 


000001 


DOERR 


003200R 


KTXTND- 


040000 


PTR2 


000402R 


SR4 


000024R 


BIT1 - 


000002 


DROP 


001404R 


MAP22*" 


104416 


PUSH 


• 005746 


START 


0004 10R 


BIT10 > 


002000 


DV 


00024 OR 


MASK 


OO0242R 


PUSH2 


• 024646 


STAT 


000026R 


BIT11 - 


004000 


DVID1 


000014R 


MODNAM 


OOOOOOR 


PWRFLG 


- 000002 


SVDODI 


000270R 


BIT12 * 


0100O0 


DVMASK 


000400R 


MOOSP 


000224R 


p; 


000224R 


SVRO 


000062R 


BIT13 - 


020000 


DVREGS 


000360R 


MORDEV 


001170R 


P2 


000226R 


SVR1 


000064 R 


BIT14 ■ 


040000 


EABIT 


000310R 


MORE 


000244R 


P3 


O0O23OR 


SVR2 


000066R 


BIT15 - 


100000 


EABITS 


002234R 


MSGN* ■ 


104403 


P4 


O0O232R 


SVR3 


000070R 


BIT2 - 


000004 


ECCMGM- 


000100 


MSGS* ■ 


104402 


QM0N22 


• 000010 


SVR4 


000072R 


BIT3 « 


000010 


ENDIT*- 


104413 


MSG$ • 


104401 


RAND* 


- 104417 


SVR5 


000074* 


BIT4 - 


000020 


ENORBF 


000336R 


MSSG1 


0032 10R 


RPNNUM 


000054R 


SVR6 


000076" 


BITS » 


000040 


ENOWBF 


000342R 


MSSG2 


O03235R 


REFADR 


000334R 


SWAPCC 


002766R 


BIT6 - 


000100 


ENDS - 


104410 


MSSG3 


003262R 


RBUF 


O0O312R 


SYSCNT 


00005 2R 


BIT7 * 


000200 


ERBITS 


000356R 


MSSG4 


003314R 


RBUTEA 


O0O330R 


TOCNT 


00040f-r> 


BIT8 * 


000400 


ERRSET 


003170R 


MSSG5 


003366R 


RBUFPA 


O0O326R 


TRPOFO- 


ocoxr^ 


BIT9 - 


0C1000 


ERRTYP 


000106R 


NCPUOP- 


000020 


RBUFSZ 


O0O332R 


USTACK- 


OOOOr 


BREAK** 


104407 


EXINC 


001644* 


NOAPTY- 


• 000002 


RBUFVA 


000324R 


VECTOR 


ooc;» 


BRK 


001070R 


EXIT! - 


104400 


NOINTR 


00 3 204 R 


RCC 


O0O302R 


WASADR 


000*. 


BR1 


0000 12R 


GETBUF 


001520R 


NOSET 


003164R 


REABIT 


002264R 


U8FA0R 


ooo. :■:. 


BR2 


0000 13R 


GETDEV 


002564R 


NPASS 


001320R 


REEDIN 


004406R 


U/BUf' 


00- ;. ' 


BTOD$ * 


104421 


GETOUT 


002636R 


NULL ■ 


• 000000 


REREST 


000634R 


WBUFEA 


oo -^ :fh 


BUTSZ 


000250R 


GETPA*- 


104415 


NXT 


001310R 


RESDAT 


002464R 


UBUFPA 


C00*2CR 


B1TCC 


000276R 


GO 


001054R 


OPEN ' 


■ 000000 


RESTRT 


O0O534R 


WflUFVA 


000316R 


B12US 


000246R 


GUBUK $ - 


104414 


OTOAI ■ 


' 104420 


RfcSl 


000056R 


UCC 


OC0300R 


CAPRES- 


000004 


MRDCNT 


00004 4 R 


PARPRE- 


■ 002000 


RES2 


000060R 


WDFR 


0001 U.R 


cc 


000362R 


HRDERI- 


104405 


PASCNT 


000034R 


RH70 


• 001000 


WDTO 


0001 14R 


COATA$- 


104412 


HRDPAS 


000050R 


PDPFU" 


■ 000002 


ROTCNT 


000234R 


UEABIT 


0023.':2R 


CHEKPX 


001742R 


ICON! 


000036R 


PDPLSI- 


■ 020000 


ROTPAT 


002424R 


UREGS 


00201 GR 


CKHNGi- 


000001 


ICOUNT 


00004 OR 


PDP44 • 


• ! 00000 


ROTRQS 


002360R 


WRTO'J] 


00^4 f: 


CKMORE 


001436R 


IDNUM 


000122R 


POP60 « 


• 00-1000 


RQLVL 


000354R 


XFLAG 


oor yvv.x 


CLKPRE* 


000001 


INCCNT 


001622R 


PDP70 ' 


■ 010000 


RREGS 


O0207OR 


XFRl 


O0w344R 


CLKSP*- 


104422 


INCDO 


001640R 


PIRQ* • 


< 000004 


RSTRT 


000112R 


XFR2 


00v*46R 


CLRREG 


001646R 


INOPAR- 


000040 


POPSP 


■ 005726 


R6 


-*000006 


XFR3 


000350R 


CONFIG 


000056R 


INIT 


000030R 


P0PSP2 


• 022626 


R7 


»tf 00000 7 


XFR4 


000352R 


CR1 


000366R 


INTR 


000120R 














. ABS. 


000000 
005350 


000 
001 
















ERRORS 


DETECTED: 




















SEQ 23 



VIRTUAL MEMORY USED: 13417 WORDS 
DYNAMIC MEMORY: 20060 WORDS ( 77 
ELAPSED TIME: 00:01:02 
B^A»BEA/-SP=DDXCOM,BEA 



( 5^ PAGES) 
PAGES) 



DEC/Xll 
DEC/Xll 
DEC/Xll 

oec/xii 

DEC/Xll 
DEC/X11 
D€C/X11 
DEC/Xll 
DEC/Xll 
DEC/Xll 
DEC/X11 

oec/xn 

DEC/Xll 



SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 



EXERS,, 
EXERS.. 
EXERS,. 
EXERS,, 
EXERS., 
EXERS,, 
EXERS,. 
EXERS,. 
EXERS.. 
EXERS,. 
EXERS., 
EXERS.. 
EXERS., 



,.B1 
,.C1 
..01 
,,E1 
,.F1 
, ,G1 
..HI 
.,11 
,.J1 
,.K1 
, ,L1 
..Ml 
. ,N1 



oec/xn 

OEC/Xll 
DEC/Xll 
OEC/Xll 
DEC/Xll 
DEC/Xll 
DEC/Xll 
DEC/Xll 
DEC/Xll 
SYMBOL 



SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
SYSTEM 
TABLE 



EXERS B2 

EXERS C2 

EXERS 02 

EXERS E2 

EXERS F2 

EX*RS G2 

EXERS HZ 

EXERS 12 

EXERS J2 

• • « .K2 



